home *** CD-ROM | disk | FTP | other *** search
/ Technotools / Technotools (Chestnut CD-ROM)(1993).ISO / lang_c / cug106 / fact.mou < prev    next >
Text File  |  1984-06-14  |  256b  |  11 lines
  1. ("!Enter a number "m?=
  2.   m.^
  3.   nm.=
  4.   1
  5.   (n.^
  6.     n.*  nn.1-=
  7.     )
  8.   "!Factorial ("  m.!  ")=" ! "!-------------------------"
  9.   )
  10. $$
  11.